home *** CD-ROM | disk | FTP | other *** search
/ Developer CD Series 1996 February: Tool Chest / Apple Developer CD Series Tool Chest February 1996 (Apple Computer)(1996).iso / Tool Chest / Interfaces & Libraries / Interfaces / AIncludes / Menus.a < prev    next >
Encoding:
Text File  |  1993-11-30  |  1.4 KB  |  45 lines  |  [TEXT/MPS ]
  1. ;    File:        Menus.a
  2. ;
  3. ;    Copyright:    © 1983-1993 by Apple Computer, Inc.
  4. ;                All rights reserved.
  5. ;
  6. ;    Version:    System 7.1 for ETO #11
  7. ;    Created:    Tuesday, March 30, 1993 18:00
  8. ;
  9. ;___________________________________________________________________________
  10.  
  11.     IF &TYPE('__INCLUDINGMENUS__') = 'UNDEFINED' THEN
  12. __INCLUDINGMENUS__    SET    1
  13.  
  14.     IF &TYPE('__INCLUDINGTRAPS__') = 'UNDEFINED' THEN
  15.                     INCLUDE 'Traps.a'
  16.     ENDIF
  17. ;————————————————————————————————————————————————————————————————————————————————————————————————————
  18. ; Define the Menu Manager Dispatch trap opword
  19. _MenuDispatch                OPWORD        $A825
  20.  
  21. ;————————————————————————————————————————————————————————————————————————————————————————————————————
  22. ; Define the new selectors for the Menu Manager
  23. selectInsertFontResMenu        EQU    0
  24. selectInsertIntlResMenu        EQU    1
  25.  
  26. ;————————————————————————————————————————————————————————————————————————————————————————————————————
  27. ; Define the parameter size passed for each call
  28. paramWordsInsertFontResMenu    EQU    4
  29. paramWordsInsertIntlResMenu    EQU    6
  30.  
  31. ;————————————————————————————————————————————————————————————————————————————————————————————————————
  32. ; Define the dispatch macros to get to the calls
  33.  
  34.         MACRO
  35.         _InsertFontResMenu
  36.         DoDispatch _MenuDispatch,selectInsertFontResMenu,paramWordsInsertFontResMenu
  37.         ENDM
  38.  
  39.         MACRO
  40.         _InsertIntlResMenu
  41.         DoDispatch _MenuDispatch,selectInsertIntlResMenu,paramWordsInsertIntlResMenu
  42.         ENDM
  43.  
  44.     ENDIF            ; Already included
  45.